home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: delta / whiteline CD Series - delta.iso / tex / style / misc / bbold.sty < prev    next >
Text File  |  1995-11-25  |  2KB  |  67 lines
  1. %% bbold.sty  v 1.1 von J"org Knappen 9. 1. 1992
  2. %% (c) J"org Knappen 1991, 1992         knappen@vkpmzd.kph.uni-mainz.de
  3. %% Copying conditions Gnu licence v 1.0
  4. %% Created 28-apr-1991
  5. %% Changed 7-oct-1991: Added English Documentation
  6. %%                     and an error message, if the New Font Selection Scheme
  7. %%                     is not used
  8. %% Changed 9-jan-1992: \RIfM@ and the following definion block is defined
  9. %%                     without any condition. The condition
  10. %%                     \@ifundefined{RIfM@} had lead to incompatibility
  11. %%                     with e.g. amsbsy.sty (v 1.0)
  12. %%
  13. %% L"adt die BBOLD-Zeichens"atze unter dem neuen Zeichensatzwahlschema
  14. %% und definiert \bbold (als Fontschalter) sowie \Eins (Zeichen f"ur die
  15. %% Einheitsmatrix)
  16. %% The BBOLD fonts are loaded and the following control sequences are
  17. %% defined:
  18. %% \bbold    acts as a font switch, switching its argument to BBOLD
  19. %% \Eins     prints the bbold 1 (Unit matrix)
  20. \@ifundefined{extract@font}
  21.      {\errmessage{The style option `bbold' does not make sense if you
  22.                   do not use a format with the new font selection scheme.}
  23.       \endinput}
  24.      {}
  25.  
  26.   \def\RIfM@{\relax\protect\ifmmode}
  27.     \let\boxz@\fi % \if \fi matching hack
  28.   \def\boxz@{\box\z@}
  29.   \def\setboxz@h{\setbox\z@\hbox}
  30.   \def\wdz@{\wd\z@}
  31.   \def\noaccents@{\def\accentclass@{0}}
  32.   \def\Invalid@@{Invalid use of \string}
  33.   \def\nonmatherr@#1{\err@
  34.     {\string#1\space allowed only in math mode}\@ehd}
  35.   \def\err@{\@latexerr}
  36.  
  37. \newmathalphabet\bbold@
  38. \addtoversion{normal}\bbold@{bbold}{m}{n}
  39. \addtoversion{bold}\bbold@{bbold}{m}{n}
  40. \def\pbbold{\RIfM@\expandafter\bbold@\else
  41.                   \expandafter\nonmatherr@\expandafter\bbold\fi}
  42. \def\bbold{\protect\pbbold}
  43. \new@fontshape{bbold}{m}{n}{%
  44.   <5>bbold5%
  45.   <6>bbold6%
  46.   <7>bbold7%
  47.   <8>bbold8%
  48.   <9>bbold9%
  49.   <10>bbold10%
  50.   <11>bbold11%       This one was computed with the help of the Sauter tools
  51. %  <11>bbold10 at10.95pt% alternative, change the position of the % sign to
  52. %                         choose this
  53.   <12>bbold12%
  54.   <14>bbold14%       Ditto, design_size:=14.4;
  55. %  <14>bbold12 at14.4pt%  alternative
  56.   <17>bbold17%
  57.   }{}
  58. \extra@def{bbold}{}{\noaccents@}
  59.  
  60.  
  61. % Die Einheitsmatrix (Unit matrix)
  62.  
  63. \def\Eins{\bbold 1 }
  64.  
  65. \endinput
  66.  
  67.